@then@box @if@box @and@box @or@box @regel@box @depth = 1.5ex = 1.5ex = 0.5ex = 0.5ex = 1cm = 2cm = 0pt = 1ex = 1ex @firstrule firstruletrue namedefregel* regel-Umgebung in \hbox nicht erlaubt @firstrule < - restorepar < - regel-Umgebung in math-mode nicht erlaubt currentlabel=1 eqnswtrue hen@box=THEN( f@box=to hen@boxIF( nd@box=AND r@box=ORifnextchar,to f@box by -hen@box <)< <40>>ifnextchar;to f@box by -hen@box <)< <41>>ifnextchar.to f@box by -hen@box <)< <42>>to f@box by -hen@box <) <14>>ifnextchar,to hen@box by -hen@box <)< <45>>ifnextchar;to hen@box by -hen@box <)< <46>>ifnextchar.to hen@box by -hen@box <)< <47>>to hen@box by -hen@box <) <15>> @box @box egel@box- by - parboxrestore namedefendregel*epth=egel@box epth by egel@box epth by - egel@box to epth @eqnsw eqnnum @̧equation@ne doendpefirstrulefalse ignoretrue

restorepar firstruletrue endpefalse =restorepar 0= firstruletrue endpefalse endpetrue